﻿Public Class frmScreen
	Private Sub picScreen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles picScreen.Click
		HideForm()
	End Sub

	Private Sub tmrHide_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tmrHide.Tick
		HideForm()
	End Sub

	Public Sub HideForm()
		tmrHide.Enabled = False
		Visible = False
	End Sub

	Protected Overrides Sub OnHandleDestroyed(ByVal e As System.EventArgs)
		HideForm()
		MyBase.OnHandleDestroyed(e)
	End Sub
End Class